home *** CD-ROM | disk | FTP | other *** search
/ Chip 2007 January, February, March & April / Chip-Cover-CD-2007-02.iso / Pakiet bezpieczenstwa / mini Pentoo LiveCD 2006.1 / mpentoo-2006.1.iso / livecd.squashfs / usr / bin / xtrace < prev    next >
Text File  |  2006-05-08  |  5KB  |  196 lines
  1. #! /bin/sh
  2. # Copyright (C) 1999, 2001-2004, 2005 Free Software Foundation, Inc.
  3. # This file is part of the GNU C Library.
  4. # Contributed by Ulrich Drepper <drepper@gnu.org>, 1999.
  5.  
  6. # The GNU C Library is free software; you can redistribute it and/or
  7. # modify it under the terms of the GNU Lesser General Public
  8. # License as published by the Free Software Foundation; either
  9. # version 2.1 of the License, or (at your option) any later version.
  10.  
  11. # The GNU C Library is distributed in the hope that it will be useful,
  12. # but WITHOUT ANY WARRANTY; without even the implied warranty of
  13. # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  14. # Lesser General Public License for more details.
  15.  
  16. # You should have received a copy of the GNU Lesser General Public
  17. # License along with the GNU C Library; if not, write to the Free
  18. # Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
  19. # 02111-1307 USA.
  20.  
  21. pcprofileso=/lib/libpcprofile.so
  22. pcprofiledump=/usr/bin/pcprofiledump
  23. TEXTDOMAIN=libc
  24.  
  25. # Print usage message.
  26. do_usage() {
  27.   printf $"Usage: xtrace [OPTION]... PROGRAM [PROGRAMOPTION]...\n"
  28.   exit 0
  29. }
  30.  
  31. # Refer to --help option.
  32. help_info() {
  33.   printf >&2 $"Try \`xtrace --help' for more information.\n"
  34.   exit 1
  35. }
  36.  
  37. # Message for missing argument.
  38. do_missing_arg() {
  39.   printf >&2 $"xtrace: option \`$1' requires an argument.\n"
  40.   help_info
  41. }
  42.  
  43. # Print help message
  44. do_help() {
  45.   printf $"Usage: xtrace [OPTION]... PROGRAM [PROGRAMOPTION]...\n"
  46.   printf $"Trace execution of program by printing currently executed function.
  47.  
  48.      --data=FILE          Don't run the program, just print the data from FILE.
  49.  
  50.    -?,--help              Print this help and exit
  51.       --usage             Give a short usage message
  52.    -V,--version           Print version information and exit
  53.  
  54. Mandatory arguments to long options are also mandatory for any corresponding
  55. short options.
  56.  
  57. For bug reporting instructions, please see:
  58. <http://www.gnu.org/software/libc/bugs.html>.\n"
  59.   exit 0
  60. }
  61.  
  62. do_version() {
  63.   echo 'xtrace (GNU libc) 2.3.6'
  64.   printf $"Copyright (C) %s Free Software Foundation, Inc.
  65. This is free software; see the source for copying conditions.  There is NO
  66. warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
  67. " "2005"
  68.   printf $"Written by %s.
  69. " "Ulrich Drepper"
  70.   exit 0
  71. }
  72.  
  73. # Print out function name, file, and line number in a nicely formatted way.
  74. format_line() {
  75.   fct=$1
  76.   file=${2%%:*}
  77.   line=${2##*:}
  78.   width=$(expr $COLUMNS - 30)
  79.   filelen=$(expr length $file)
  80.   if test "$filelen" -gt "$width"; then
  81.     rwidth=$(expr $width - 3)
  82.     file="...$(expr substr $file $(expr 1 + $filelen - $rwidth) $rwidth)"
  83.   fi
  84.   printf '%-20s  %-*s  %6s\n' $fct $width $file $line
  85. }
  86.  
  87.  
  88. # If the variable COLUMNS is not set do this now.
  89. COLUMNS=${COLUMNS:-80}
  90.  
  91. # If `TERMINAL_PROG' is not set, set it to `xterm'.
  92. TERMINAL_PROG=${TERMINAL_PROG:-xterm}
  93.  
  94. # The data file to process, if any.
  95. data=
  96.  
  97. # Process arguments.  But stop as soon as the program name is found.
  98. while test $# -gt 0; do
  99.   case "$1" in
  100.   --d | --da | --dat | --data)
  101.     if test $# -eq 1; then
  102.       do_missing_arg $1
  103.     fi
  104.     shift
  105.     data="$1"
  106.     ;;
  107.   --d=* | --da=* | --dat=* | --data=*)
  108.     data=${1##*=}
  109.     ;;
  110.   -? | --h | --he | --hel | --help)
  111.     do_help
  112.     ;;
  113.   -V | --v | --ve | --ver | --vers | --versi | --versio | --version)
  114.     do_version
  115.     ;;
  116.   --u | --us | --usa | --usag | --usage)
  117.     do_usage
  118.     ;;
  119.   --)
  120.     # Stop processing arguments.
  121.     shift
  122.     break
  123.     ;;
  124.   --*)
  125.     printf >&2 $"xtrace: unrecognized option \`$1'\n"
  126.     help_info
  127.     ;;
  128.   *)
  129.     # Unknown option.  This means the rest is the program name and parameters.
  130.     break
  131.     ;;
  132.   esac
  133.   shift
  134. done
  135.  
  136. # See whether any arguments are left.
  137. if test $# -eq 0; then
  138.   printf >&2 $"No program name given\n"
  139.   help_info
  140. fi
  141.  
  142. # Determine the program name and check whether it exists.
  143. program=$1
  144. shift
  145. if test ! -f "$program"; then
  146.   printf >&2 $"executable \`$program' not found\n"
  147.   help_info
  148. fi
  149. if test ! -x "$program"; then
  150.   printf >&2 $"\`$program' is no executable\n"
  151.   help_info
  152. fi
  153.  
  154. # We have two modes.  If a data file is given simply print the included data.
  155. printf "%-20s  %-*s  %6s\n" Function $(expr $COLUMNS - 30) File Line
  156. for i in $(seq 1 $COLUMNS); do printf -; done; printf '\n'
  157. if test -n "$data"; then
  158.   $pcprofiledump "$data" |
  159.   sed 's/this = \([^,]*\).*/\1/' |
  160.   addr2line -fC -e "$program" |
  161.   while read fct; do
  162.     read file
  163.     if test "$fct" != '??' -a "$file" != '??:0'; then
  164.       format_line $fct $file
  165.     fi
  166.   done
  167. else
  168.   fifo=$(mktemp -u ${TMPDIR:-/tmp}/xtrace.XXXXXX)
  169.   mkfifo -m 0600 $fifo || exit 1
  170.   trap 'rm $fifo; exit 1' SIGINT SIGTERM SIGPIPE
  171.  
  172.   # Now start the program and let it write to the FIFO.
  173.   $TERMINAL_PROG -T "xtrace - $program $*" -e /bin/sh -c "LD_PRELOAD=$pcprofileso PCPROFILE_OUTPUT=$fifo $program $*; read < $fifo" &
  174.   termpid=$!
  175.   $pcprofiledump -u $fifo |
  176.   while read line; do
  177.      echo $line |
  178.      sed 's/this = \([^,]*\).*/\1/' |
  179.      addr2line -fC -e $program
  180.   done |
  181.   while read fct; do
  182.     read file
  183.     if test "$fct" != '??' -a "$file" != '??:0'; then
  184.       format_line $fct $file
  185.     fi
  186.   done
  187.   read -p "Press return here to close $TERMINAL_PROG($program)."
  188.   echo > $fifo
  189.   rm $fifo
  190. fi
  191.  
  192. exit 0
  193. # Local Variables:
  194. #  mode:ksh
  195. # End:
  196.